// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
03A4: name_thread 'COORDS' 
0006: 33@ = 0 
0006: 3@ = 0 
0006: 4@ = 0 
0006: 5@ = 0 
0006: 11@ = 0 
0006: 12@ = 0 
0006: 13@ = 0 
0006: 9@ = 0 

:COORDS_67
0001: wait 0 ms 
00D6: if 
0256:   player $PLAYER_CHAR defined 
004D: jump_if_false @COORDS_67 
077E: get_active_interior_to 10@ 
03F0: enable_text_draw 1 
045B: draw_text_2numbers 0.0 1.0 GXT 'CRDSX' numbers 3@ 11@ 
045B: draw_text_2numbers 140.0 1.0 GXT 'CRDSY' numbers 4@ 12@ 
045B: draw_text_2numbers 280.0 1.0 GXT 'CRDSZ' numbers 5@ 13@ 
045A: draw_text_1number 420.0 1.0 GXT 'CRDSA' number 9@ 
045A: draw_text_1number 500.0 1.0 GXT 'CRDSI' number 10@ 
00D6: if 
0019:   33@ > 1000 
004D: jump_if_false @COORDS_67 
0006: 33@ = 0 
00A0: store_actor $PLAYER_ACTOR position_to 0@ 1@ 2@ 
0092: 3@ = float 0@ to_integer 
0092: 4@ = float 1@ to_integer 
0092: 5@ = float 2@ to_integer 
0093: 6@ = integer 3@ to_float 
0093: 7@ = integer 4@ to_float 
0093: 8@ = integer 5@ to_float 
0063: 0@ -= 6@ // (float) 
0063: 1@ -= 7@ // (float) 
0063: 2@ -= 8@ // (float) 
0013: 0@ *= 10000.0 
0013: 1@ *= 10000.0 
0013: 2@ *= 10000.0 
0092: 11@ = float 0@ to_integer 
0092: 12@ = float 1@ to_integer 
0092: 13@ = float 2@ to_integer 
00D6: if 
001B:   0 > 11@ 
004D: jump_if_false @COORDS_416 
0012: 11@ *= -1 

:COORDS_416
00D6: if 
001B:   0 > 12@ 
004D: jump_if_false @COORDS_441 
0012: 12@ *= -1 

:COORDS_441
00D6: if 
001B:   0 > 13@ 
004D: jump_if_false @COORDS_466 
0012: 13@ *= -1 

:COORDS_466
0172: 9@ = actor $PLAYER_ACTOR Z_angle 
0092: 9@ = float 9@ to_integer 
0002: jump @COORDS_67 
